home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Collections: Taifun
/
Taifun 007 (1987-02-15)(Ossowski, Stefan)(DE)(PD).zip
/
Taifun 007 (1987-02-15)(Ossowski, Stefan)(DE)(PD).adf
/
C Compiler
/
test.s
< prev
Wrap
Text File
|
1987-03-04
|
331b
|
27 lines
text
main:
link %a6,&-4
movm.l &0x1000,-(%a7)
mov &0,%d3
mov.l %d3,-(%a7)
jsr subr
add.w &4,%a7
L%0:
movm.l (%a7)+,&0x0008
unlk %a6
rts
subr:
link %a6,&0
movm.l &0x1000,-(%a7)
mov.l 8(%a6),%d3
mov &2,%d0
muls %d3,%d0
mov.l %d0,%d3
mov.l %d3,%d0
L%1:
movm.l (%a7)+,&0x0008
unlk %a6
rts
global main
global subr